home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (PO) / Nibble Volume 12, No. 08 (1991-08)(MindCraft Publishing)(Side A)[a].zip / Nibble Volume 12, No. 08 (1991-08)(MindCraft Publishing)(Side A)[a].po / BORDERS.bas < prev    next >
BASIC Source File  |  1996-12-24  |  309b  |  2 lines
  1. 1  TEXT : HOME : PRINT "BORDER CHARACTER:";: GET B$: PRINT : HOME : VTAB 1: FOR A = 1 TO 40: PRINT B$;: NEXT : FOR A = 2 TO 22: VTAB A: HTAB 1: PRINT B$;: HTAB 40: PRINT B$;: NEXT 
  2. 2  VTAB 23: FOR A = 1 TO 40: PRINT B$;: NEXT A: VTAB 20: HTAB 20: POKE 33,2: POKE 32,1: POKE 33,38: POKE 34,1: POKE 35,22: HOME